

/*
REPLICATION CODE for Study #1 in:
"Commanding Support: Values and Interests in the Rhetoric of Alliance Politics"
published in International Interactions

Authors: Jonathan Chu, Jiyoung Ko, and Adam Liu
Contact: jonchu@stanford.edu
*/

clear
cd "[INSERT FILE PATH HERE]"
use Replication_Study1_DataFile.dta



*************Table 1

mean dv_keep200 if t_values==0 & t_interests==0
mean dv_keep200 if t_values==1 & t_interests==0
mean dv_keep200 if t_values==0 & t_interests==1
mean dv_keep200 if t_values==1 & t_interests==1


************Figure 1
reg dv_keep200 t_values, r
estimates store a
reg dv_keep200 t_interests, r
estimates store b

coefplot ///
(a, offset(0) msymbol(square) msize(vlarge) color("2 105 168") ciopts(color("2 105 168") recast(rcap) )  ) ///
(b, msymbol(square) msize(vlarge) mfcolor("217 33 33") color("217 33 33") ciopts(color("217 33 33") recast(rcap) )  ) ///
, ///
drop (_cons) ///
xscale(noextend) ///
title("Rhetoric Effect in Percentage Points", size(medlarge) margin(medium) color(black) pos(6) ) ///
xlab (-5(5)20 ) ///
xline (0, lcolor(gray) lp(dash)) ///
ylab( 1 `""Shared" "Values""' 2 `""National" "Interests""' , ///
labsize(medlarge) tlcolor(white) nogrid ) ///
yscale (lcolor(white)  ) ///
graphregion(fcolor(white) lcolor(white) ) bgcolor(white) ///
legend ( off ) xsize(15) ysize(15) ///
name(Main_effects, replace)


**********Appendix Table 1

summ dv_keep2 // note that dv_keep200 is simply dv_keep2*100, to provide a 1 through 100 percentage point scale, instead of 0 through 1.
summ ideo5
summ female
summ age
summ white
summ college
summ dem2
summ rep2




***** Appendix Robustness Checks with 7-point scale DV

ranksum dv_keep7, by(t_interests)
ranksum dv_keep7, by(t_values)


